function [p_l_lwon,p_h_lwon,p_l_llost,p_h_llost]=transition_prob_oneshot(c_l,c_h,V_l,V_h,k,eta)
% All that matters in the one-shot game are the players' cost ratio and win/lose prize spread ratio, and the randomness parameter k; the environmental disutility is a fixed cost 
% PSYCHOLOGICAL MOMENTUM (eta is hypothesized to be less than one but positive): l won previous set multiplies eta to c_l this period; l lost previous set multiplies eta to c_h this period

N=size(c_l,1);

p_l_lwon=ones(N,1)./(ones(N,1)+(((c_l*eta)./c_h).*(V_h./V_l)).^k);    % equal to p_lwin3 following lwon in set 2
p_h_lwon=ones(N,1)-p_l_lwon;                                          % equal to p_llose3 following lwon in set 2

p_l_llost=ones(N,1)./(ones(N,1)+((c_l./(c_h*eta)).*(V_h./V_l)).^k);   % equal to p_lwin3 following llost in set 2
p_h_llost=ones(N,1)-p_l_llost;                                        % equal to p_llose3 following llost in set 2

end